home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Amiga Format CD 41
/
Amiga Format CD41 (1999-06)(Future Publishing)(GB)[!][issue 1999-07].iso
/
-seriously_amiga-
/
graphics
/
videoeasel
/
camrexx
/
soil.rexx
< prev
next >
Wrap
OS/2 REXX Batch file
|
1999-04-19
|
349b
|
16 lines
/* Soil-Rule idea by Toffoli, in CAMRexx by THOR */
MakeAlgorithm:
PLANEALGORITHM moore centers
return
MakePlane:
stable=(n_west | north | n_east) & ,
(s_west | south | s_east) & ,
(n_west | west | s_west) & ,
(n_east | east | s_east)
new=center & stable
SETPLANE new
return